       01  RQ071Input.
         03  fill--0 PIC X(16).
         03  RQ071--bp--id PIC X(9).
       01  RQ071OutputPart.
         03  RQ071--error--code PIC X(3).
         03  RQ071--total--bal PIC S9(11)V9(2) COMP-3.
         03  RQ071--cst--tp--cd PIC X(2).
         03  RQ071--open--date PIC X(10).
         03  RQ071--future--due PIC S9(11)V9(2) COMP-3.
         03  RQ071--current--due PIC S9(11)V9(2) COMP-3.
         03  RQ071--past--due--1 PIC S9(11)V9(2) COMP-3.
         03  RQ071--past--due--2 PIC S9(11)V9(2) COMP-3.
         03  RQ071--past--due--3 PIC S9(11)V9(2) COMP-3.
         03  RQ071--cr--amnt PIC S9(11)V9(2) COMP-3.
         03  RQ071--total--bal--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--future--due--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--current--due--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--past--due--1--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--past--due--2--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--past--due--3--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--cr--amnt--stmt PIC S9(11)V9(2) COMP-3.
         03  RQ071--check OCCURS 15 TIMES.
           05  RQ071--check--date PIC X(10).
           05  RQ071--check--no PIC X(12).
           05  RQ071--check--amnt PIC S9(11)V9(2) COMP-3.
         03  RQ071--last--stmnt--date PIC X(10).
         03  RQ071--ar--term--desc PIC X(40).
         03  RQ071--amnt--due PIC S9(11)V9(2) COMP-3.
         03  RQ071--curr--disc PIC S9(11)V9(2) COMP-3.
         03  RQ071--avail--disc PIC S9(11)V9(2) COMP-3.
         03  RQ071--due--date PIC X(10).
         03  RQ071--final--due--amnt PIC S9(11)V9(2) COMP-3.
